#pragma GCC optimize(2)
#include <iostream>
#include <queue>
#include <map>
#include <unordered_map>
#include <vector>
#include <algorithm>
#include <cmath>
#include <string>
#include <cstring>
#include <set>
#include <unordered_set>
#define IOS ios::sync_with_stdio(false), cin.tie(0), cout.tie(0)
using namespace std;
typedef long long ll;
typedef unsigned long long ull;
typedef pair<int,int> pii;
const int N=55;
int pre[N];
int sum[N];
int f[N][N][2];
int b[N];
int a[N];
int main()
{
	int n,st;
	cin>>n>>st;
	for(int i=1;i<=n;i++) cin>>a[i]>>b[i];
	
	for(int i=1;i<=n;i++) sum[i]=sum[i-1]+b[i];
	
	memset(f,0x3f,sizeof(f));
	
	f[st][st][0]=f[st][st][1]=0;
	
	for(int len=2;len<=n;len++)
	{
		for(int l=1;l+len-1<=n;l++)
		{
			int r=l+len-1;
			f[l][r][0]=min(f[l+1][r][0]+(a[l+1]-a[l])*(sum[l]+sum[n]-sum[r]),
			               f[l+1][r][1]+(a[r]-a[l])*(sum[l]+sum[n]-sum[r]));
			f[l][r][1]=min(f[l][r-1][1]+(a[r]-a[r-1])*(sum[l-1]+sum[n]-sum[r-1]),
			               f[l][r-1][0]+(a[r]-a[l])*(sum[l-1]+sum[n]-sum[r-1]));
		}
	}
	
	cout<<min(f[1][n][0],f[1][n][1]);


	return 0;
}

